unit UsedTypes;

{
  PasCalc
  Version 1.2 2011-05-26

  Copyright (C) 2011 KEEPER <yar.keeper@gmail.com>

  This file is part of the PasCalc Calculator

  This unit is free software; you can redistribute it and/or
  modify it under the terms of the GNU Lesser General Public
  License as published by the Free Software Foundation; either
  version 2.1 of the License, or (at your option) any later version.

  See the file LICENSE.TXT, included in this distribution,
  for details about the copyright.

  This program is distributed in the hope that it will be useful,
  but WITHOUT ANY WARRANTY; without even the implied warranty of
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
}

{$mode objfpc}{$H+}

interface

 type

  TGridStyle = (gsCells, gsCages);

  TPoint = record
    x, y: LongInt;
  end;

  TSelection = record
    start, finish: integer;
    str: ANSIString;
  end;

  TFloatPres = (fpDefault, fpAuto, fpManual);

  TComplPres = (cpAlg, cpExp);

  TColors = array [0..1] of integer;

  TOptions = packed record
    FloatPres: TFloatPres;  //представление чисел
    Size, Fract: integer;  //Size число цифр в числе Fract число знаков после запятой
    GraphColor: integer;    //Цвет графика
    NetColor: integer; //Цвет сетки
    GraphStyle: TGridStyle; //Стиль графика
    IsRad: boolean; //режим
    ManyInOne: boolean; //несколько графиков в одних осях
    ComplPres: TComplPres; //представление комплексных чисел
    Lang: ShortString; //Язык
    IsHistory: boolean;
    IsLogging: boolean;
  end;


implementation


end.

